A=[99 -6 24 0;
   -6 130 -30 0;
   24 -30 71 0;
    0 0 0 0];
quad_type(A)